home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Demos / AppMaker 2.0b3 / Demo AppMaker 1.5 / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpP_1098_IconGroup < prev    next >
Encoding:
Text File  |  1992-04-08  |  320 b   |  14 lines
  1. %case window field%
  2.     %fieldname%:%        %integer;
  3. %case dialog field%
  4.     %fieldname%:%        %integer;
  5.     %haveField%
  6. %case init field%
  7.     %fieldname% := 1;
  8. %case auxiliary%
  9.     %needsFilter%
  10.     %set needsRefCon = true%
  11. %case filter%
  12.     data := %dlogname%RecPtr (GetWRefCon (whichDialog));
  13.     FilterIcon (event, %itemname%, data^.%fieldname%);
  14.